Top 10k strings from Nominas (1984)(Investronica)(es).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
15 ;" "; 9 1;" "; 6 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4 ;" ": 3 ;" "; 3 ;" " 3 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 SUELDO=SUELDO+( 2 P$(B)*C(17 2 L-(Z*K)>(K/2 2 L-(Z*K)<(K/2 2 K$(B))*C(9 2 J$(B)*D(B))*C(7 2 H$(Y)="0": 2 F$(B)*C(10 2 EL PROGRAMA NO INCLUYE LOS LIMI-"''"TES POR GRUPOS EN LA COTIZACION"''"A LA SEGURIDAD SOCIAL Y ACCIDEN-"''"TES LABORALES."'' 2 ;B;" ";A$(B) 2 ;"_____________________" 2 ;"_______"; 2 ;"Total "; 2 ;"S.Social"; 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 );" ";R$(2 2 ))+(A(B)*C(8 1 sc 1 p 1 nomina 2 1 definicion caracteres 1 W$(Y)="0": 1 V$(Y)="0": 1 U$(Y)="0": 1 TOPES DE COTIZACION POR GRUPO"; 1 TODOS LOS DATOS EXISTENTES EN ELFICHERO."; 1 TECLEE NOMBRE Y APELLIDOS 1 TECLEE EL NUMERO 1 T$(Y)="0": 1 SUELDO>214260 1 SUELDO=214260 1 SON CORRECTOS LOS DATOS? 1 SEGURIDAD SOCIAL? ": 1 SEGURIDAD SOCIAL 1 S$(Y)="0": 1 QUE BASE DE NORMALIZACION EXISTEEN LA ACTUALIDAD? ": 1 QUE % SE COTIZA A LA S. SOCIAL? ": 1 QUE % SE COTIZA A ACC. LABORAL? ": 1 QUE % ES? ";I: 1 QUE % ES? ";F: 1 PROGRAMACION DE LAS COTIZACIONES"''"TANTO DEL I.R.P.F., COMO LAS DE "''"S. SOCIAL Y ACCIDENTES LABORALES 1 P$(Y)="0": 1 ORIGINAL TAPE 1 OPCION 8.- SUMAS BRUTOS Y NETOS 1 OPCION 7.- DATOS COTIZACION S.S. / IRPF 1 OPCION 6.- ABANDONAR EL PROGRAMA 1 OPCION 5.- BORRADO 1 OPCION 4.- GRABACION 1 OPCION 3.- CREACION/CORRECCION 1 OPCION 2.- LISTADO 1 OPCION 1.- BUSQUEDA 1 O=R(Y)-N(Y): 1 O BIEN USE LA OPCION DE BORRAR" 1 NOTA IMPORTANTE 1 NO CONSTA NADIE CON ESOS DATOS"; 1 N O M I N A S 1 M$(Y)="0": 1 LOS COMP. SALARIALES COTIZAN A. 1 LAS HORAS EXTRAS COTIZAN A... 1 LA PAGA EXTRA COTIZA A... 1 LA AYUDA FAMILIAR COTIZA A... 1 L$(Y)="0": 1 K$(Y)="0": 1 J$(Y)="0": 1 J$(Y)*D(Y))+ 1 J$(B)*D(B)*C(1 1 INVESTRONICA 1 I. R. P. F. ? ": 1 I$(Y)="0": 1 GRABE ESTOS DATOS EN CASSETTE" 1 GO TO 5200 1 G$(Y)="0": 1 F$(Y)="0": 1 EL SUELDO BASE COTIZA A... 1 EDAD COTIZA A... 1 DESEA OBTENER UNA COPIA? 1 DESEA MODIFICAR ALGO? 1 DESEA GRABARLO? 1 DESEA BORRARLOS? (SI/NO) 1 DATOS PARA LA BUSQUEDA 1 CUANTAS NOMINAS? ";: 1 CUAL ES? ";K 1 CONTESTE SI O NO 1 C$(Y)="0": 1 B$(Y)="0": 1 ACC. LABORAL? ": 1 ACC. LABORAL 1 A$(Y)=N$(1 1 A$(Y)="0": 1 ;Y;" ";A$(Y) 1 ;"Trienios"; 1 ;"Total a percibir Pts. "; 1 ;"Sueldo.."; 1 ;"SI DESEA VOLVER AL PROGRAMA SINPERDER LOS DATOS ALMACENADOSHASTA EL MOMENTO, PULSE:"; 1 ;"SEGURIDAD SOCIAL"; 1 ;"S.SOCIAL=": 1 ;"Retenc.."; 1 ;"Pro.P.Ext"; 1 ;"Paga Ex."; 1 ;"NO CONSTA EN MEMORIA QUE BASE "''"DE NORMALIZACION TIENE LA S.S.": 1 ;"NO CONSTA EN MEMORIA EL % DE"''"COTIZACION POR ACC. LABORAL": 1 ;"NO CONSTA EN MEMORIA EL % DE"''"COTIZACION A LA SEGURIDAD SOCIAL": 1 ;"NETOS =": 1 ;"I.R.P.F.=": 1 ;"I.R.P.F."; 1 ;"H.Ext.";; 1 ;"H. Extra "; 1 ;"Gpo.S.S."; 1 ;"GRUPO " ;n;" TOPE ACTUAL ";Q(n);" " 1 ;"ESTA OPCION DEL MENU, 1 ;"EN EL ARCHIVO! 1 ;"EL NUMERO DE EMPLEADOS, TIENE"''"QUE SER SUPERIOR A ";" 1 ;"DIFERENCIA"; 1 ;"Com.Sal. "; 1 ;"BRUTOS =": 1 ;"Ayu.Fam."; 1 ;"Anticipo" 1 ;"Acc.Lab."; 1 ;"ACC.LAB.=": 1 ;" DE LA SEGURIDAD SOCIAL 1 ;" ": 1 ;" "; 1 ;" " 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 -SOLO ACEPTO HASTA 20 NOMINAS- 1 )+R(Y)-N(Y) 1 (sueldo*i): 1 (sueldo*f): 1 (L*E(B)/100 1 ((L+k)*I): 1 ((L+k)*F): 1 ''"SI DESEA FONDO OSCURO Y LETRAS CLARAS, PULSE ";" 1 "SI DESEA FONDO CLARO Y LETRAS OSCURAS, PULSE ";" 1 "PARA SU COMODIDAD.."'' 1 "NUEVO TOPE ";Q$: 1 "EN AQUELLOS CASOS AISLADOS EN"''"QUE LA BASE DE COTIZACION NO"''"CORRESPONDIESE AL GRUPO DE UN"''"DETERMINADO EMPLEADO, SE DEBERA"''"CALCULAR INDEPENDIENTEMENTE Y"''"POR LOS METODOS ORDINARIOS." 1 SUMAS DE BRUTOS Y NETOS" 1 PULSE UNA TECLA PARA COMENZAR 1 PARA VOLVER A EMPEZAR " 1 NUMERO SEGURIDAD SOCIAL"; 1 NUMERO D.N.I."; 1 NOMBRE Y DOS APELLIDOS "; 1 LISTADO DEL ARCHIVO"; 1 GRABACION DEL ARCHIVO"; 1 ELIJA UNA DE LAS TRES OPCIONES 1 DATOS COTIZACION I.R.P.F. Y"; 1 CREACION DE ARCHIVO"; 1 BUSQUEDA/CORRECCION NOMINAS"; 1 BORRADO DEL ARCHIVO ACTUAL"; 1 ABANDONAR EL PROGRAMA"; 1 ": 1 1 1